home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / c / tcclib.exe / BLCKERAS.C < prev    next >
Encoding:
C/C++ Source or Header  |  1989-07-18  |  399 b   |  21 lines
  1. void TcclibInitialize( void );
  2. unsigned char far *ScrPtr( int x, int y );
  3.  
  4. void BlockErase( int x, int y, int xx, int yy )
  5. {
  6.     register int j;
  7.     register unsigned char far *scptr;
  8.     register int i;
  9.     extern unsigned char A_NORMAL;
  10.  
  11.     TcclibInitialize();
  12.  
  13.     for (i=y; i<=yy; ++i) {
  14.         scptr = ScrPtr( x, i );
  15.         for (j=x; j<=xx; ++j) {
  16.             *scptr++ = ' ';
  17.             *scptr++ = A_NORMAL;
  18.         }
  19.     }
  20. }
  21.